home *** CD-ROM | disk | FTP | other *** search
- This is patch #3 to Moira release 2.2, of Wed Jul 25 11:49:01 EDT 1990
- (revised Wed Sep 5 16:31:30 EDT 1990)
-
- BE SURE TO APPLY THIS PATCH WITH
-
- patch -p
-
- TO PRESERVE THE DIRECTORY HIERARCHY.
-
- The following bugs are fixed:
-
- 1. Update patchlevel.h to indicate we are at patchlevel 3.
- 2. Have the moira client double-check that the real name of a user
- being added follows the capitalization rules, and warn if not.
- 3. Problems dereferencing NULL in several places.
- 4. The reg_svr sometimes dumped core do to a botched malloc because of
- problems in the glue library.
- 5. Sometimes after a server error, all subsequent operations fail with
- the same error.
- 6. Accidentally installed the gdb lint library as lsmsgdb instead of
- lmrgdb.
- 7. Make sure that FixCase() uppercases starting letters in names.
- 8. update_server shouldn't mask of SIGCHILD in it's children processes.
- 9. moira.h should declare the function mr_motd().
- 10.Gramatical error in Cluster Data menu of moira client.
- 11.In moira client, refresh screen before starting a query with the
- server.
- 12.Fix bug in reordering of filesystems in fsgroups with the moira client.
- 13.Attempting to set a user's pobox to a foreign address with the
- moira client would delete that pobox.
-
-
-
- *** /tmp/,RCSt1019079 Thu Jun 7 15:59:41 1990
- --- patchlevel.h Thu Jun 7 15:56:33 1990
- ***************
- *** 1 ****
- ! #define PATCHLEVEL 2
- --- 1 ----
- ! #define PATCHLEVEL 3
- *** /tmp/user.c Wed Sep 5 15:53:55 1990
- --- clients/moira/user.c Wed Sep 5 15:55:51 1990
- ***************
- *** 1,5 ****
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/user.c,v 1.18 90/03/17 17:11:25 mar Exp $";
- #endif lint
-
- /* This is the file user.c for the MOIRA Client, which allows a nieve
- --- 1,5 ----
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/user.c,v 1.20 90/05/02 15:47:21 mar Exp $";
- #endif lint
-
- /* This is the file user.c for the MOIRA Client, which allows a nieve
- ***************
- *** 11,17 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/user.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/user.c,v 1.18 90/03/17 17:11:25 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- --- 11,17 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/user.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/user.c,v 1.20 90/05/02 15:47:21 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- ***************
- *** 133,138 ****
- --- 133,161 ----
- return(info);
- }
-
- +
- + /* Check that the supplied name follows the capitalization rules, and
- + * offer to correct it if not.
- + */
- +
- + CorrectCapitalization(name)
- + char **name;
- + {
- + char temp_buf[BUFSIZ], fixname[BUFSIZ];
- +
- + strcpy(fixname, *name);
- + FixCase(fixname);
- + if (strcmp(fixname, *name)) {
- + Put_message("You entered a name which does not follow the capitalization conventions.");
- + sprintf(temp_buf, "Correct it to \"%s\"", fixname);
- + if (YesNoQuestion(temp_buf, 1)) {
- + free(*name);
- + *name = strsave(fixname);
- + }
- + }
- + }
- +
- +
- /* Function Name: AskUserInfo.
- * Description: This function askes the user for information about a
- * machine and saves it into a structure.
- ***************
- *** 148,154 ****
- char ** info;
- Bool name;
- {
- ! char temp_buf[BUFSIZ], *newname, *temp_ptr;
-
- if (name) {
- sprintf(temp_buf,"\nChanging Attributes of user %s.\n",info[U_NAME]);
- --- 171,177 ----
- char ** info;
- Bool name;
- {
- ! char temp_buf[BUFSIZ], fixname[BUFSIZ], *newname, *temp_ptr;
-
- if (name) {
- sprintf(temp_buf,"\nChanging Attributes of user %s.\n",info[U_NAME]);
- ***************
- *** 158,165 ****
- --- 181,191 ----
- char *argv[3];
-
- GetValueFromUser("User's last name", &info[U_LAST]);
- + CorrectCapitalization(&info[U_LAST]);
- GetValueFromUser("User's first name", &info[U_FIRST]);
- + CorrectCapitalization(&info[U_FIRST]);
- GetValueFromUser("User's middle name", &info[U_MIDDLE]);
- + CorrectCapitalization(&info[U_MIDDLE]);
- argv[0] = info[U_FIRST];
- argv[1] = info[U_LAST];
- if (do_mr_query("get_user_by_name", 2, argv,
- ***************
- *** 183,190 ****
- --- 209,219 ----
- GetValueFromUser("User's shell", &info[U_SHELL]);
- if (name) {
- GetValueFromUser("User's last name", &info[U_LAST]);
- + CorrectCapitalization(&info[U_LAST]);
- GetValueFromUser("User's first name", &info[U_FIRST]);
- + CorrectCapitalization(&info[U_FIRST]);
- GetValueFromUser("User's middle name", &info[U_MIDDLE]);
- + CorrectCapitalization(&info[U_MIDDLE]);
- }
- while (1) {
- int i;
- ***************
- *** 372,377 ****
- --- 401,408 ----
-
- Prompt_input("First Name: ", first, BUFSIZ);
- Prompt_input("Last Name: ", last, BUFSIZ);
- + FixCase(first);
- + FixCase(last);
-
- args[0] = first;
- args[1] = last;
- *** /tmp/,RCSt1019116 Thu Jun 7 16:07:22 1990
- --- dcm/dcm.c Thu May 31 14:29:45 1990
- ***************
- *** 7,17 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/dcm/RCS/dcm.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/dcm/RCS/dcm.c,v 1.14 90/04/09 18:41:45 mar Exp $
- */
-
- #ifndef lint
- ! static char rcsid_dcm_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/dcm/RCS/dcm.c,v 1.14 90/04/09 18:41:45 mar Exp $";
- #endif lint
-
- #include <stdio.h>
- --- 7,17 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/dcm/RCS/dcm.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/dcm/RCS/dcm.c,v 1.15 90/05/31 14:29:27 mar Exp $
- */
-
- #ifndef lint
- ! static char rcsid_dcm_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/dcm/RCS/dcm.c,v 1.15 90/05/31 14:29:27 mar Exp $";
- #endif lint
-
- #include <stdio.h>
- ***************
- *** 46,55 ****
- int i;
- char **arg = argv;
- char *qargv[3];
- int status;
-
- whoami = argv[0];
- ! dbg = atoi(getenv("DEBUG"));
- umask(UMASK);
- log_flags = 0;
- setlinebuf(stderr);
- --- 46,57 ----
- int i;
- char **arg = argv;
- char *qargv[3];
- + char *s;
- int status;
-
- whoami = argv[0];
- ! s = getenv("DEBUG");
- ! dbg = s ? atoi(s) : 0;
- umask(UMASK);
- log_flags = 0;
- setlinebuf(stderr);
- *** /tmp/,RCSt1017662 Wed Jun 13 15:20:27 1990
- --- server/mr_util.c Thu Jun 7 17:52:16 1990
- ***************
- *** 1,7 ****
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_util.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_util.c,v 1.16 90/03/19 15:42:24 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- --- 1,7 ----
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_util.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_util.c,v 1.17 90/06/07 17:52:10 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- ***************
- *** 9,15 ****
- */
-
- #ifndef lint
- ! static char *rcsid_mr_util_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_util.c,v 1.16 90/03/19 15:42:24 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- --- 9,15 ----
- */
-
- #ifndef lint
- ! static char *rcsid_mr_util_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_util.c,v 1.17 90/06/07 17:52:10 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- ***************
- *** 121,124 ****
- --- 121,142 ----
- }
- }
- return(0);
- + }
- +
- +
- + /* returns a copy of the argv and all of it's strings */
- +
- + char **mr_copy_args(argv, argc)
- + char **argv;
- + int argc;
- + {
- + char **a;
- + int i;
- +
- + a = (char **) malloc(argc * sizeof(char *));
- + if (a == 0)
- + return(a);
- + for (i = 0; i < argc; i++)
- + a[i] = strsave(argv[i]);
- + return(a);
- }
- *** /tmp/mr_glue.c Wed Sep 5 15:58:56 1990
- --- server/mr_glue.c Wed Sep 5 16:02:27 1990
- ***************
- *** 1,7 ****
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_glue.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_glue.c,v 1.14 90/03/19 15:41:41 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- --- 1,7 ----
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_glue.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_glue.c,v 1.17 90/06/07 17:51:37 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- ***************
- *** 12,18 ****
- */
-
- #ifndef lint
- ! static char *rcsid_mr_glue_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_glue.c,v 1.14 90/03/19 15:41:41 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- --- 12,18 ----
- */
-
- #ifndef lint
- ! static char *rcsid_mr_glue_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_glue.c,v 1.17 90/06/07 17:51:37 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- ***************
- *** 129,136 ****
- time(&now);
- hints.proc = callproc;
- hints.hint = callarg;
- ! return mr_process_query(&pseudo_client, name, argc, argv,
- ! callback, &hints);
- }
-
- int mr_access(name, argc, argv)
- --- 129,136 ----
- time(&now);
- hints.proc = callproc;
- hints.hint = callarg;
- ! return mr_process_query(&pseudo_client, name, argc,
- ! mr_copy_args(argv, argc), callback, &hints);
- }
-
- int mr_access(name, argc, argv)
- ***************
- *** 139,145 ****
- char **argv; /* Args */
- {
- time(&now);
- ! return mr_check_access(&pseudo_client, name, argc, argv);
- }
-
- int mr_query_internal(argc, argv, callproc, callarg)
- --- 139,146 ----
- char **argv; /* Args */
- {
- time(&now);
- ! return mr_check_access(&pseudo_client, name, argc,
- ! mr_copy_args(argv, argc));
- }
-
- int mr_query_internal(argc, argv, callproc, callarg)
- ***************
- *** 153,160 ****
- time(&now);
- hints.proc = callproc;
- hints.hint = callarg;
- ! return mr_process_query(&pseudo_client, argv[0], argc-1, argv+1,
- ! callback, &hints);
- }
-
- int mr_access_internal(argc, argv)
- --- 154,161 ----
- time(&now);
- hints.proc = callproc;
- hints.hint = callarg;
- ! return mr_process_query(&pseudo_client, argv[0], argc-1,
- ! mr_copy_args(argv+1, argc-1), callback, &hints);
- }
-
- int mr_access_internal(argc, argv)
- ***************
- *** 162,168 ****
- char **argv;
- {
- time(&now);
- ! return mr_check_access(&pseudo_client, argv[0], argc-1, argv+1);
- }
-
- mr_shutdown(why)
- --- 163,170 ----
- char **argv;
- {
- time(&now);
- ! return mr_check_access(&pseudo_client, argv[0], argc-1,
- ! mr_copy_args(argv+1, argc-1));
- }
-
- mr_shutdown(why)
- *** /tmp/,RCSt1017676 Wed Jun 13 15:22:14 1990
- --- server/mr_scall.c Fri Jun 1 18:46:52 1990
- ***************
- *** 1,7 ****
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_scall.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_scall.c,v 1.19 90/03/19 15:42:05 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- --- 1,7 ----
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_scall.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_scall.c,v 1.20 90/06/01 18:46:36 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- ***************
- *** 10,16 ****
- */
-
- #ifndef lint
- ! static char *rcsid_sms_scall_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_scall.c,v 1.19 90/03/19 15:42:05 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- --- 10,16 ----
- */
-
- #ifndef lint
- ! static char *rcsid_sms_scall_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/server/RCS/mr_scall.c,v 1.20 90/06/01 18:46:36 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- ***************
- *** 95,100 ****
- --- 95,101 ----
- client *cl;
- {
- int pn;
- + extern int ingres_errno;
- cl->reply.mr_argc = 0;
- cl->reply.mr_status = 0;
- cl->reply.mr_version_no = cl->args->mr_version_no;
- ***************
- *** 117,122 ****
- --- 118,126 ----
- com_err(whoami, MR_DOWN, "(query refused)");
- return;
- }
- +
- + /* make sure this gets cleared before every operation */
- + ingres_errno = 0;
-
- switch(pn) {
- case MR_NOOP:
- *** /tmp/Makefile Wed Sep 5 16:05:22 1990
- --- gdb/Makefile Wed Sep 5 16:06:28 1990
- ***************
- *** 1,7 ****
- #
- # $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/gdb/RCS/Makefile,v $
- # $Author: mar $
- ! # $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/gdb/RCS/Makefile,v 1.11 90/03/17 00:01:13 mar Exp $
- #
- # Revised makefile for GDB library.
- #
- --- 1,7 ----
- #
- # $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/gdb/RCS/Makefile,v $
- # $Author: mar $
- ! # $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/gdb/RCS/Makefile,v 1.13 90/05/02 18:45:11 mar Exp $
- #
- # Revised makefile for GDB library.
- #
- ***************
- *** 57,65 ****
- install:
- install -c -m 644 libgdb.a ${DESTDIR}/usr/athena/lib/libsmsgdb.a
- ranlib ${DESTDIR}/usr/athena/lib/libsmsgdb.a
- ! install -c -m 644 libgdb_p.a ${DESTDIR}/usr/athena/lib/libsmsgdb_p.a
- ! ranlib ${DESTDIR}/usr/athena/lib/libsmsgdb_p.a
- ! install -c -m 644 llib-lgdb.ln ${DESTDIR}/usr/lib/lint/llib-lsmsgdb.ln
-
- #
- # Random demo programs
- --- 57,65 ----
- install:
- install -c -m 644 libgdb.a ${DESTDIR}/usr/athena/lib/libsmsgdb.a
- ranlib ${DESTDIR}/usr/athena/lib/libsmsgdb.a
- ! # install -c -m 644 libgdb_p.a ${DESTDIR}/usr/athena/lib/libmrgdb_p.a
- ! # ranlib ${DESTDIR}/usr/athena/lib/libmrgdb_p.a
- ! install -c -m 644 llib-lgdb.ln ${DESTDIR}/usr/lib/lint/llib-lmrgdb.ln
-
- #
- # Random demo programs
- *** /tmp/fixname.c Wed Sep 5 16:08:03 1990
- --- rpc/fixname.c Wed Sep 5 16:10:22 1990
- ***************
- *** 1,7 ****
- /*
- * $Source: /mit/smsdev/rpc/RCS/fixname.c,v $
- * $Author: mar $
- ! * $Header: fixname.c,v 1.3 88/09/13 15:51:13 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- --- 1,7 ----
- /*
- * $Source: /mit/smsdev/rpc/RCS/fixname.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/rpc/RCS/fixname.c,v 1.4 90/05/02 15:52:10 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- * For copying and distribution information, please see the file
- ***************
- *** 9,15 ****
- */
-
- #ifndef lint
- ! static char *rcsid_fixname_c = "$Header: fixname.c,v 1.3 88/09/13 15:51:13 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- --- 9,15 ----
- */
-
- #ifndef lint
- ! static char *rcsid_fixname_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/rpc/RCS/fixname.c,v 1.4 90/05/02 15:52:10 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- ***************
- *** 51,74 ****
- #endif notdef
- strncpy(first, ifnm, FIRST_LEN);
- }
- ! #ifdef notdef
- ! AppendJrOrIII(nm, phas_jr, phas_iii, phas_iv)
- ! register char *nm;
- ! register int *phas_jr;
- ! register int *phas_iii;
- ! register int *phas_iv;
- ! {
- ! if (*phas_jr) {
- ! strcat(nm, ", Jr.");
- ! }
- ! else if (*phas_iii) {
- ! strcat(nm, " III");
- ! }
- ! else if (*phas_iv) {
- ! strcat(nm, " IV");
- ! }
- ! }
- ! #endif notdef
- FixCase(p)
- register char *p;
- {
- --- 51,57 ----
- #endif notdef
- strncpy(first, ifnm, FIRST_LEN);
- }
- !
- FixCase(p)
- register char *p;
- {
- ***************
- *** 76,90 ****
- /* a space or punctuation mark (e.g., '-') */
-
- for (cflag = 0; *p; p++) {
- ! if (cflag && isupper(*p)) {
- ! *p = tolower(*p);
- ! }
- ! else if (isspace(*p) || ispunct(*p)) {
- ! cflag = 0;
- ! }
- ! else {
- ! cflag = 1;
- ! }
- }
- }
-
- --- 59,72 ----
- /* a space or punctuation mark (e.g., '-') */
-
- for (cflag = 0; *p; p++) {
- ! if (cflag && isupper(*p))
- ! *p = tolower(*p);
- ! else if (!cflag && islower(*p))
- ! *p = toupper(*p);
- ! if (isalpha(*p))
- ! cflag = 1;
- ! else
- ! cflag = 0;
- }
- }
-
- *** /tmp/,RCSt1017735 Wed Jun 13 15:31:34 1990
- --- update/exec_002.c Fri Jun 8 10:53:20 1990
- ***************
- *** 1,6 ****
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/update/RCS/exec_002.c,v $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/update/RCS/exec_002.c,v 1.7 90/03/19 13:02:19 mar Exp $
- */
- /* (c) Copyright 1988 by the Massachusetts Institute of Technology. */
- /* For copying and distribution information, please see the file */
- --- 1,6 ----
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/update/RCS/exec_002.c,v $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/update/RCS/exec_002.c,v 1.8 90/06/08 10:53:02 mar Exp $
- */
- /* (c) Copyright 1988 by the Massachusetts Institute of Technology. */
- /* For copying and distribution information, please see the file */
- ***************
- *** 7,13 ****
- /* <mit-copyright.h>. */
-
- #ifndef lint
- ! static char *rcsid_exec_002_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/update/RCS/exec_002.c,v 1.7 90/03/19 13:02:19 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- --- 7,13 ----
- /* <mit-copyright.h>. */
-
- #ifndef lint
- ! static char *rcsid_exec_002_c = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/update/RCS/exec_002.c,v 1.8 90/06/08 10:53:02 mar Exp $";
- #endif lint
-
- #include <mit-copyright.h>
- ***************
- *** 44,49 ****
- --- 44,50 ----
- exit(1);
- return;
- case 0:
- + sigsetmask(mask);
- execlp(str, str, (char *)NULL);
- n = errno;
- sigsetmask(mask);
- *** /tmp/moira.h Wed Sep 5 16:14:08 1990
- --- include/moira.h Wed Sep 5 16:15:07 1990
- ***************
- *** 1,7 ****
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/include/RCS/moira.h,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/include/RCS/moira.h,v 1.15 90/03/17 16:30:56 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- *
- --- 1,7 ----
- /*
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/include/RCS/moira.h,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/include/RCS/moira.h,v 1.17 90/06/13 12:40:57 mar Exp $
- *
- * Copyright (C) 1987 by the Massachusetts Institute of Technology
- *
- ***************
- *** 71,76 ****
- --- 71,77 ----
- int mr_connect(char *server);
- int mr_disconnect();
- int mr_host(char *host, int size);
- + int mr_motd(char **motd);
- int mr_auth(char *prog);
- int mr_access(char *handle, int argc, char **argv);
- int mr_access_internal(int argc, char **argv);
- ***************
- *** 89,94 ****
- --- 90,96 ----
- int mr_connect();
- int mr_disconnect();
- int mr_host();
- + int mr_motd();
- int mr_auth();
- int mr_access();
- int mr_query();
- *** /tmp/menus.c Wed Sep 5 16:16:28 1990
- --- clients/moira/menus.c Wed Sep 5 16:17:45 1990
- ***************
- *** 1,5 ****
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menus.c,v 1.16 90/03/17 17:10:48 mar Exp $";
- #endif lint
-
- /* This is the file menus.c for the MOIRA Client, which allows a nieve
- --- 1,5 ----
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menus.c,v 1.18 90/06/13 12:42:07 mar Exp $";
- #endif lint
-
- /* This is the file menus.c for the MOIRA Client, which allows a nieve
- ***************
- *** 11,17 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menus.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menus.c,v 1.16 90/03/17 17:10:48 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- --- 11,17 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menus.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menus.c,v 1.18 90/06/13 12:42:07 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- ***************
- *** 52,58 ****
- {"data", "The data to be added: "},
- } },
- { RemoveClusterData, NULLMENU, 3, {
- ! {"delete", "Remove Data to a given Cluster"},
- {"clus", "Cluster's Name: "},
- {"label", "Label Identifing the data: "},
- } },
- --- 52,58 ----
- {"data", "The data to be added: "},
- } },
- { RemoveClusterData, NULLMENU, 3, {
- ! {"delete", "Remove Data from a given Cluster"},
- {"clus", "Cluster's Name: "},
- {"label", "Label Identifing the data: "},
- } },
- *** /tmp/,RCSt1017757 Wed Jun 13 15:36:11 1990
- --- clients/moira/menu.c Tue Jun 12 16:30:02 1990
- ***************
- *** 5,11 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menu.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menu.c,v 1.28 90/04/09 18:03:56 mar Exp $
- *
- * Generic menu system module.
- *
- --- 5,11 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menu.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menu.c,v 1.29 90/06/12 16:29:49 mar Exp $
- *
- * Generic menu system module.
- *
- ***************
- *** 18,24 ****
- */
-
- #ifndef lint
- ! static char rcsid_menu_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menu.c,v 1.28 90/04/09 18:03:56 mar Exp $";
-
- #endif lint
-
- --- 18,24 ----
- */
-
- #ifndef lint
- ! static char rcsid_menu_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/menu.c,v 1.29 90/06/12 16:29:49 mar Exp $";
-
- #endif lint
-
- ***************
- *** 396,401 ****
- --- 396,410 ----
- parsed_argc = 0;
- }
- }
- +
- + refresh_screen()
- + {
- + if (cur_ms != NULLMS) {
- + touchwin(cur_ms->ms_screen);
- + refresh_ms(cur_ms);
- + }
- + }
- +
-
- /* Prompt the user for input in the input window of cur_ms */
- int Prompt_input(prompt, buf, buflen)
- *** /tmp/,RCSt1017765 Wed Jun 13 15:37:37 1990
- --- clients/moira/utils.c Tue Jun 12 16:30:24 1990
- ***************
- *** 1,5 ****
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/utils.c,v 1.26 90/05/02 13:13:32 mar Exp $";
- #endif lint
-
- /* This is the file utils.c for the MOIRA Client, which allows a nieve
- --- 1,5 ----
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/utils.c,v 1.27 90/06/12 16:30:08 mar Exp $";
- #endif lint
-
- /* This is the file utils.c for the MOIRA Client, which allows a nieve
- ***************
- *** 11,17 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/utils.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/utils.c,v 1.26 90/05/02 13:13:32 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- --- 11,17 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/utils.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/utils.c,v 1.27 90/06/12 16:30:08 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- ***************
- *** 911,916 ****
- --- 911,917 ----
- int status;
- extern char *whoami, *moira_server;
-
- + refresh_screen();
- status = mr_query(name, argc, argv, proc, hint);
- if (status != MR_ABORTED && status != MR_NOT_CONNECTED)
- return(status);
- *** /tmp/attach.c Wed Sep 5 16:19:09 1990
- --- clients/moira/attach.c Wed Sep 5 16:23:30 1990
- ***************
- *** 1,5 ****
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/attach.c,v 1.23 90/04/05 17:35:57 mar Exp $";
- #endif
-
- /* This is the file attach.c for the MOIRA Client, which allows a nieve
- --- 1,5 ----
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/attach.c,v 1.25 90/06/12 16:29:21 mar Exp $";
- #endif
-
- /* This is the file attach.c for the MOIRA Client, which allows a nieve
- ***************
- *** 13,19 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/attach.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/attach.c,v 1.23 90/04/05 17:35:57 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- --- 13,19 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/attach.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/attach.c,v 1.25 90/06/12 16:29:21 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- ***************
- *** 661,668 ****
- char **argv;
- int argc;
- {
- ! int stat, src, dst;
- ! struct qelem *elem = NULL, *top;
- char buf[BUFSIZ], *bufp, *args[3];
-
- if ((stat = do_mr_query("get_fsgroup_members", 1, argv+1, StoreInfo,
- --- 661,668 ----
- char **argv;
- int argc;
- {
- ! int stat, src, dst, i;
- ! struct qelem *elem = NULL, *top, *tmpelem;
- char buf[BUFSIZ], *bufp, *args[3];
-
- if ((stat = do_mr_query("get_fsgroup_members", 1, argv+1, StoreInfo,
- ***************
- *** 690,709 ****
- Put_message("Aborted.");
- return(DM_NORMAL);
- }
- ! for (elem = top; src-- > 1 && elem->q_forw; elem = elem->q_forw);
- ! if (src > 1) {
- Put_message("You entered a number that is too high");
- continue;
- }
- break;
- }
- ! bufp = Strsave("0");
- ! stat = GetValueFromUser("Enter number of filesystem it should follow (0 to make it first):", &bufp);
- ! dst = atoi(bufp);
- ! free(bufp);
- ! if (src == dst || src == dst + 1) {
- ! Put_message("That has no effect on the sorting order!");
- ! return(DM_NORMAL);
- }
- args[2] = SortAfter(top, dst);
- args[0] = argv[1];
- --- 690,723 ----
- Put_message("Aborted.");
- return(DM_NORMAL);
- }
- ! for (elem = top, i = src; i-- > 1 && elem->q_forw; elem = elem->q_forw);
- ! if (i > 1) {
- Put_message("You entered a number that is too high");
- continue;
- }
- break;
- }
- ! while (1) {
- ! bufp = Strsave("0");
- ! stat = GetValueFromUser("Enter number of filesystem it should follow (0 to make it first):", &bufp);
- ! dst = atoi(bufp);
- ! free(bufp);
- ! if (src == dst || src == dst + 1) {
- ! Put_message("That has no effect on the sorting order!");
- ! return(DM_NORMAL);
- ! }
- ! if (dst < 0) {
- ! Put_message("You must enter a non-negative number.");
- ! continue;
- ! }
- ! for (tmpelem = top, i = dst;
- ! i-- > 1 && tmpelem->q_forw;
- ! tmpelem = tmpelem->q_forw);
- ! if (i > 0) {
- ! Put_message("You entered a number that is too high");
- ! continue;
- ! }
- ! break;
- }
- args[2] = SortAfter(top, dst);
- args[0] = argv[1];
- *** /tmp/,RCSt1017780 Wed Jun 13 15:39:57 1990
- --- clients/moira/pobox.c Thu Jun 7 17:57:50 1990
- ***************
- *** 1,5 ****
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/pobox.c,v 1.15 90/04/25 12:39:49 mar Exp $";
- #endif lint
-
- /* This is the file pobox.c for the MOIRA Client, which allows a nieve
- --- 1,5 ----
- #if (!defined(lint) && !defined(SABER))
- ! static char rcsid_module_c[] = "$Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/pobox.c,v 1.16 90/06/07 17:57:37 mar Exp $";
- #endif lint
-
- /* This is the file pobox.c for the MOIRA Client, which allows a nieve
- ***************
- *** 11,17 ****
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/pobox.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/pobox.c,v 1.15 90/04/25 12:39:49 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- --- 11,17 ----
- *
- * $Source: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/pobox.c,v $
- * $Author: mar $
- ! * $Header: /afs/athena.mit.edu/astaff/project/moiradev/src/clients/moira/RCS/pobox.c,v 1.16 90/06/07 17:57:37 mar Exp $
- *
- * Copyright 1988 by the Massachusetts Institute of Technology.
- *
- ***************
- *** 49,54 ****
- --- 49,56 ----
- sprintf(buf, "Address: %-10s Box: %-35s Type: %s", info[PO_NAME],
- info[PO_BOX], info[PO_TYPE]);
- Put_message(buf);
- + sprintf(buf, MOD_FORMAT, info[4], info[3], info[5]);
- + Put_message(buf);
- }
-
- /* Function Name: RealPrintPOMachines
- ***************
- *** 223,229 ****
- default:
- return(DM_NORMAL); /* ^C hit. */
- }
- !
- default: /* ^C hit. */
- type = "NONE";
- break;
- --- 225,231 ----
- default:
- return(DM_NORMAL); /* ^C hit. */
- }
- ! break;
- default: /* ^C hit. */
- type = "NONE";
- break;
-